Variant is a data type in certain programming languages, particularly Visual Basic and C++ when using the Component Object Model.
In Visual Basic (and Visual Basic for Applications) the Variant data type is a tagged union that can be used to represent any other data type (for example, integer, floating-point, single- and double-precision, object, etc.) except fixed-length string type and record types. In Visual Basic any variable, not declared explicitly or the type of which is not declared explicitly, is taken to be a variant.
While the use of not explicitly declared variants is not recommended, they can be of use when the needed data type can only be known at runtime, when the data type is expected to vary, or when optional parameters and parameter arrays are desired. In fact, languages with a dynamic type system often have variant as the only available type for variables.
Among the major changes in Visual Basic .NET, being a .NET language, the variant type was replaced with the .NET object type. There are similarities in concept, but also major differences, and no direct conversions exist between these two types. For conversions, as might be needed if Visual Basic .NET code is interacting with a Visual Basic 6 COM object, the normal methodology is to use .NET marshalling.
In unrelated usage, variant type is also used to refer to an algebraic data type (comparable to a tagged union), whose constructors are often called variants. In languages such as OCaml and Haskell, this kind of variant type is the standard language building block for representing many data structures.
Contents |
In Visual Basic, a variant named A can be explicitly declared as shown in these two examples:
Dim A Dim A as Variant
In C++, a variant named A can be declared as follows:
VARIANT A;
In Delphi, a variant named A is declared in the following way:
var A: variant;
A variable of variant type, for brevity called a "variant", as defined in Visual Basic, needs 16 bytes storage and its layout is as follows:
Offset | Size | Description |
---|---|---|
0 | 2 | The value returned by VarType; specifies what kind of data the variant contains. |
2 | 6 | Reserved bytes; should be set to zero. |
8 | up to 8 | The data the variant contains. |
A few examples of variants that one can encounter in Visual Basic follow. In other languages other kinds of variants can be used as well.
VarType | Data bytes | C and C++ type | TypeName |
---|---|---|---|
0 | Empty1 | ||
1 | Null2 | ||
10 | 2A000A80 | HRESULT (long int) | Error |
10 | 80020004 | HRESULT (long int) | Missing3 |
17 | 2A | BYTE (unsigned char) | Byte |
11 | FFFF | VARIANT_BOOL (short int) | Boolean |
2 | 2A00 | short int | Integer |
3 | 2A000000 | long int | Long |
4 | 00002842 | float | Single |
5 | 0000000000004540 | double | Double |
6 | A068060000000000 | CY structure | Currency |
7 | 00000000C0D5E140 | DATE (double) | Date |
8 | xxxxxxxx | BSTR (wchar_t pointer) | String |
9 | 00000000 | IUnknown pointer | Nothing4 |
9 | xxxxxxxx | IUnknown pointer | Object reference5 |
The Collection
class in OLE Automation can store items of different data types. Since the data type of these items cannot be known at compile time, the methods to add items to and retrieve items from a collection use variants. If in Visual Basic the For Each
construct is used, the iterator variable must be of object type, or a variant.
In OLE Automation the IDispatch
interface is used when the class of an object cannot be known in advance. Hence when calling a method on such an object the types of the arguments and the return value is not known compile time. The arguments are passed as an array of variants and when the call completes a variant is returned.
In Visual Basic a procedure argument can be declared to be optional by prefixing it with the Optional
keyword. When the argument is omitted Visual Basic passes a special value to the procedure, called Missing in the table above, indicating that the argument is missing. Since the value could either be a supplied value or a special value, a variant must be used.
Function GetText(Optional ByVal Index) As String If IsMissing(Index) Then GetText = Item(CurrentItem) Else GetText = Item(Index) End If End Function
Similarly the keyword ParamArray
can be used to pass all following arguments in a variant array.